********************************************************************************
**  TITLE:      il1992_ines_contact_networks                                  **  
**  AUTHOR:	    Philippe Mongrain                                             **
**  DATA:       1992                                                          **
**	DATE:		October 2022 					                              **	
**  VERSION:	Stata 16					                                  **	
********************************************************************************

* Version control

version 16.0

* Open log file

capture log close       			  			              
log using "il1992_ines_contact_networks", replace

* Open the dataset

use "1992.dta", clear


***************************
** INDEPENDENT VARIABLES **
***************************

* Time

gen sdate = .

replace sdate = . if a1 == 10001
replace sdate = 19920617 if a1 == 10002
replace sdate = . if a1 == 10003
replace sdate = 19920618 if a1 == 10004
replace sdate = . if a1 == 10005
replace sdate = 19920618 if a1 == 10006
replace sdate = 19920618 if a1 == 10007
replace sdate = 19920618 if a1 == 10008
replace sdate = 19920618 if a1 == 10009
replace sdate = . if a1 == 10010
replace sdate = . if a1 == 10011
replace sdate = 19920608 if a1 == 10012
replace sdate = 19920608 if a1 == 10013
replace sdate = 19920608 if a1 == 10014
replace sdate = 19920608 if a1 == 10015
replace sdate = 19920608 if a1 == 10016
replace sdate = 19920609 if a1 == 10017
replace sdate = 19920609 if a1 == 10018
replace sdate = 19920609 if a1 == 10019
replace sdate = 19920609 if a1 == 10020
replace sdate = 19920609 if a1 == 10021
replace sdate = 19920616 if a1 == 10022
replace sdate = 19920616 if a1 == 10023
replace sdate = 19920616 if a1 == 10024
replace sdate = 19920610 if a1 == 10025
replace sdate = 19920608 if a1 == 10026
replace sdate = 19920614 if a1 == 10027
replace sdate = 19920614 if a1 == 10028
replace sdate = 19920614 if a1 == 10029
replace sdate = 19920614 if a1 == 10030
replace sdate = 19920614 if a1 == 10031
replace sdate = 19920614 if a1 == 10032
replace sdate = 19920615 if a1 == 10033
replace sdate = 19920615 if a1 == 10034
replace sdate = 19920609 if a1 == 10035
replace sdate = 19920609 if a1 == 10036
replace sdate = 19920609 if a1 == 10037
replace sdate = 19920614 if a1 == 10038
replace sdate = 19920614 if a1 == 10039
replace sdate = 19920617 if a1 == 10040
replace sdate = 19920618 if a1 == 10041
replace sdate = 19920617 if a1 == 10042
replace sdate = 19920617 if a1 == 10043
replace sdate = 19920617 if a1 == 10044
replace sdate = 19920617 if a1 == 10045
replace sdate = 19920617 if a1 == 10046
replace sdate = 19920617 if a1 == 10047
replace sdate = 19920617 if a1 == 10048
replace sdate = 19920618 if a1 == 10049
replace sdate = 19920618 if a1 == 10050
replace sdate = 19920618 if a1 == 10051
replace sdate = 19920618 if a1 == 10052
replace sdate = 19920618 if a1 == 10053
replace sdate = 19920609 if a1 == 10054
replace sdate = 19920609 if a1 == 10055
replace sdate = 19920608 if a1 == 10056
replace sdate = 19920608 if a1 == 10057
replace sdate = 19920608 if a1 == 10058
replace sdate = 19920606 if a1 == 10059
replace sdate = 19920608 if a1 == 10060
replace sdate = 19920608 if a1 == 10061
replace sdate = 19920609 if a1 == 10062
replace sdate = 19920609 if a1 == 10063
replace sdate = 19920610 if a1 == 10064
replace sdate = 19920609 if a1 == 10065
replace sdate = 19920622 if a1 == 10066
replace sdate = 19920615 if a1 == 10067
replace sdate = 19920616 if a1 == 10068
replace sdate = 19920615 if a1 == 10069
replace sdate = 19920614 if a1 == 10070
replace sdate = 19920614 if a1 == 10071
replace sdate = 19920615 if a1 == 10072
replace sdate = 19920614 if a1 == 10073
replace sdate = 19920614 if a1 == 10074
replace sdate = 19920614 if a1 == 10075
replace sdate = 19920622 if a1 == 10076
replace sdate = 19920622 if a1 == 10077
replace sdate = 19920614 if a1 == 10078
replace sdate = 19920611 if a1 == 10079
replace sdate = 19920622 if a1 == 10080
replace sdate = 19920614 if a1 == 10081
replace sdate = 19920611 if a1 == 10082
replace sdate = 19920615 if a1 == 10083
replace sdate = 19920615 if a1 == 10084
replace sdate = 19920615 if a1 == 10085
replace sdate = 19920622 if a1 == 10086
replace sdate = 19920614 if a1 == 10087
replace sdate = 19920615 if a1 == 10088
replace sdate = 19920614 if a1 == 10089
replace sdate = 19920614 if a1 == 10090
replace sdate = 19920614 if a1 == 10091
replace sdate = 19920614 if a1 == 10092
replace sdate = 19920614 if a1 == 10093
replace sdate = 19920622 if a1 == 10094
replace sdate = 19920622 if a1 == 10095
replace sdate = 19920622 if a1 == 10096
replace sdate = 19920618 if a1 == 10097
replace sdate = . if a1 == 10098
replace sdate = 19920614 if a1 == 10099
replace sdate = . if a1 == 10100
replace sdate = 19920612 if a1 == 10530
replace sdate = 19920611 if a1 == 10529
replace sdate = 19920611 if a1 == 10528
replace sdate = 19920616 if a1 == 10622
replace sdate = 19920616 if a1 == 10623
replace sdate = 19920614 if a1 == 10621
replace sdate = 19920614 if a1 == 10620
replace sdate = 19920616 if a1 == 10619
replace sdate = 19920616 if a1 == 10618
replace sdate = 19920616 if a1 == 10617
replace sdate = 19920615 if a1 == 10616
replace sdate = 19920615 if a1 == 10615
replace sdate = 19920615 if a1 == 10614
replace sdate = 19920615 if a1 == 10613
replace sdate = 19920615 if a1 == 10612
replace sdate = 19920616 if a1 == 10611
replace sdate = 19920615 if a1 == 10610
replace sdate = 19920615 if a1 == 10609
replace sdate = 19920615 if a1 == 10608
replace sdate = 19920609 if a1 == 10592
replace sdate = 19920609 if a1 == 10591
replace sdate = 19920609 if a1 == 10590
replace sdate = 19920609 if a1 == 10589
replace sdate = 19920609 if a1 == 10588
replace sdate = 19920608 if a1 == 10587
replace sdate = . if a1 == 10505
replace sdate = 19920615 if a1 == 10439
replace sdate = 19920615 if a1 == 10438
replace sdate = 19920617 if a1 == 10437
replace sdate = 19920618 if a1 == 10436
replace sdate = 19920615 if a1 == 10435
replace sdate = 19920617 if a1 == 10434
replace sdate = 19920617 if a1 == 10433
replace sdate = 19920615 if a1 == 10432
replace sdate = . if a1 == 10431
replace sdate = 19920617 if a1 == 10430
replace sdate = 19920617 if a1 == 10429
replace sdate = 19920617 if a1 == 10428
replace sdate = 19920610 if a1 == 10427
replace sdate = 19920610 if a1 == 10426
replace sdate = 19920610 if a1 == 10425
replace sdate = 19920610 if a1 == 10424
replace sdate = 19920610 if a1 == 10423
replace sdate = 19920610 if a1 == 10422
replace sdate = 19920610 if a1 == 10421
replace sdate = 19920608 if a1 == 10420
replace sdate = 19920610 if a1 == 10419
replace sdate = 19920611 if a1 == 10418
replace sdate = 19920610 if a1 == 10604
replace sdate = 19920610 if a1 == 10605
replace sdate = 19920616 if a1 == 10606
replace sdate = 19920616 if a1 == 10607
replace sdate = 19920610 if a1 == 10603
replace sdate = 19920611 if a1 == 10602
replace sdate = 19920610 if a1 == 10601
replace sdate = 19920609 if a1 == 10600
replace sdate = 19920609 if a1 == 10599
replace sdate = 19920609 if a1 == 10598
replace sdate = 19920609 if a1 == 10597
replace sdate = 19920615 if a1 == 10596
replace sdate = 19920612 if a1 == 10595
replace sdate = 19920614 if a1 == 10594
replace sdate = 19920612 if a1 == 10593
replace sdate = 19920611 if a1 == 10527
replace sdate = 19920611 if a1 == 10526
replace sdate = 19920611 if a1 == 10525
replace sdate = 19920611 if a1 == 10524
replace sdate = 19920611 if a1 == 10523
replace sdate = 19920611 if a1 == 10522
replace sdate = . if a1 == 10521
replace sdate = 19920615 if a1 == 10520
replace sdate = 19920615 if a1 == 10519
replace sdate = 19920615 if a1 == 10518
replace sdate = 19920616 if a1 == 10517
replace sdate = 19920616 if a1 == 10516
replace sdate = . if a1 == 10515
replace sdate = 19920611 if a1 == 10514
replace sdate = 19920616 if a1 == 10513
replace sdate = 19920615 if a1 == 10512
replace sdate = 19920615 if a1 == 10511
replace sdate = 19920609 if a1 == 10510
replace sdate = 19920610 if a1 == 10509
replace sdate = 19920614 if a1 == 10508
replace sdate = 19920614 if a1 == 10507
replace sdate = 19920614 if a1 == 10506
replace sdate = 19920611 if a1 == 10504
replace sdate = 19920608 if a1 == 10503
replace sdate = 19920609 if a1 == 10502
replace sdate = 19920610 if a1 == 10501
replace sdate = 19920615 if a1 == 10500
replace sdate = 19920615 if a1 == 10499
replace sdate = 19920615 if a1 == 10498
replace sdate = 19920615 if a1 == 10497
replace sdate = 19920611 if a1 == 10496
replace sdate = 19920611 if a1 == 10495
replace sdate = 19920611 if a1 == 10493
replace sdate = 19920616 if a1 == 10494
replace sdate = 19920611 if a1 == 10492
replace sdate = 19920611 if a1 == 10491
replace sdate = 19920615 if a1 == 10490
replace sdate = 19920615 if a1 == 10489
replace sdate = 19920618 if a1 == 10488
replace sdate = 19920617 if a1 == 10487
replace sdate = 19920609 if a1 == 10486
replace sdate = 19920615 if a1 == 10485
replace sdate = 19920615 if a1 == 10484
replace sdate = 19920615 if a1 == 10483
replace sdate = 19920615 if a1 == 10482
replace sdate = 19920615 if a1 == 10481
replace sdate = 19920615 if a1 == 10480
replace sdate = 19920615 if a1 == 10479
replace sdate = 19920615 if a1 == 10478
replace sdate = 19920617 if a1 == 10477
replace sdate = 19920617 if a1 == 10476
replace sdate = 19920616 if a1 == 10475
replace sdate = 19920616 if a1 == 10474
replace sdate = 19920616 if a1 == 10473
replace sdate = 19920616 if a1 == 10472
replace sdate = 19920617 if a1 == 10471
replace sdate = 19920617 if a1 == 10470
replace sdate = 19920615 if a1 == 14047
replace sdate = 19920615 if a1 == 11048
replace sdate = 19920615 if a1 == 11049
replace sdate = 19920615 if a1 == 11050
replace sdate = 19920614 if a1 == 11051
replace sdate = 19920614 if a1 == 11052
replace sdate = 19920611 if a1 == 11053
replace sdate = 19920611 if a1 == 11054
replace sdate = 19920615 if a1 == 11055
replace sdate = 19920615 if a1 == 11056
replace sdate = 19920611 if a1 == 11057
replace sdate = 19920611 if a1 == 11058
replace sdate = 19920611 if a1 == 11059
replace sdate = 19920610 if a1 == 11060
replace sdate = 19920610 if a1 == 11061
replace sdate = 19920610 if a1 == 11062
replace sdate = 19920611 if a1 == 11063
replace sdate = 19920615 if a1 == 11064
replace sdate = 19920615 if a1 == 11065
replace sdate = 19920615 if a1 == 11066
replace sdate = 19920615 if a1 == 11067
replace sdate = 19920615 if a1 == 11068
replace sdate = 19920615 if a1 == 11069
replace sdate = 19920610 if a1 == 11070
replace sdate = 19920610 if a1 == 11071
replace sdate = 19920610 if a1 == 11072
replace sdate = 19920618 if a1 == 11073
replace sdate = 19920610 if a1 == 11074
replace sdate = . if a1 == 11075
replace sdate = 19920610 if a1 == 11076
replace sdate = 19920610 if a1 == 11077
replace sdate = 19920610 if a1 == 11078
replace sdate = . if a1 == 11079
replace sdate = 19920610 if a1 == 11080
replace sdate = 19920608 if a1 == 11081
replace sdate = 19920610 if a1 == 11082
replace sdate = 19920615 if a1 == 11083
replace sdate = 19920612 if a1 == 11084
replace sdate = . if a1 == 11085
replace sdate = . if a1 == 11086
replace sdate = 19920615 if a1 == 11087
replace sdate = 19920610 if a1 == 11088
replace sdate = 19920615 if a1 == 11089
replace sdate = 19920615 if a1 == 11090
replace sdate = 19920611 if a1 == 11091
replace sdate = 19920610 if a1 == 11092
replace sdate = 19920610 if a1 == 11093
replace sdate = 19920610 if a1 == 11094
replace sdate = 19920610 if a1 == 11095
replace sdate = 19920610 if a1 == 11096
replace sdate = 19920610 if a1 == 11097
replace sdate = 19920608 if a1 == 11098
replace sdate = 19920608 if a1 == 11099
replace sdate = 19920608 if a1 == 11100
replace sdate = 19920608 if a1 == 11101
replace sdate = 19920617 if a1 == 11300
replace sdate = 19920611 if a1 == 10871
replace sdate = 19920611 if a1 == 10872
replace sdate = 19920610 if a1 == 10873
replace sdate = 19920615 if a1 == 10874
replace sdate = 19920612 if a1 == 10875
replace sdate = . if a1 == 10876
replace sdate = 19920615 if a1 == 10877
replace sdate = . if a1 == 10878
replace sdate = 19920612 if a1 == 10879
replace sdate = 19920615 if a1 == 10880
replace sdate = 19920611 if a1 == 10881
replace sdate = 19920611 if a1 == 10882
replace sdate = 19920611 if a1 == 10883
replace sdate = 19920611 if a1 == 10884
replace sdate = 19920611 if a1 == 10885
replace sdate = . if a1 == 10886
replace sdate = 19920611 if a1 == 10887
replace sdate = 19920611 if a1 == 10888
replace sdate = 19920611 if a1 == 10889
replace sdate = 19920611 if a1 == 10890
replace sdate = . if a1 == 10891
replace sdate = 19920611 if a1 == 10892
replace sdate = 19920610 if a1 == 10893
replace sdate = . if a1 == 10894
replace sdate = 19920610 if a1 == 10895
replace sdate = 19920610 if a1 == 10896
replace sdate = 19920615 if a1 == 10897
replace sdate = 19920615 if a1 == 10898
replace sdate = 19920615 if a1 == 10899
replace sdate = 19920615 if a1 == 10900
replace sdate = 19920615 if a1 == 10901
replace sdate = 19920615 if a1 == 10902
replace sdate = 19920615 if a1 == 10903
replace sdate = 19920615 if a1 == 10904
replace sdate = 19920615 if a1 == 10905
replace sdate = 19920615 if a1 == 10906
replace sdate = 19920615 if a1 == 10907
replace sdate = 19920615 if a1 == 10908
replace sdate = 19920610 if a1 == 10929
replace sdate = 19920610 if a1 == 10930
replace sdate = 19920614 if a1 == 10931
replace sdate = 19920614 if a1 == 10932
replace sdate = 19920614 if a1 == 10933
replace sdate = 19920614 if a1 == 10934
replace sdate = 19920614 if a1 == 10935
replace sdate = 19920614 if a1 == 10936
replace sdate = 19920614 if a1 == 10937
replace sdate = 19920615 if a1 == 10938
replace sdate = 19920615 if a1 == 10939
replace sdate = 19920615 if a1 == 10940
replace sdate = 19920614 if a1 == 10941
replace sdate = 19920615 if a1 == 10942
replace sdate = 19920614 if a1 == 10943
replace sdate = 19920610 if a1 == 10944
replace sdate = 19920609 if a1 == 10945
replace sdate = 19920609 if a1 == 10946
replace sdate = 19920617 if a1 == 10947
replace sdate = 19920614 if a1 == 10948
replace sdate = 19920610 if a1 == 10949
replace sdate = 19920615 if a1 == 10950
replace sdate = 19920615 if a1 == 10951
replace sdate = 19920616 if a1 == 10952
replace sdate = 19920611 if a1 == 10953
replace sdate = 19920611 if a1 == 10954
replace sdate = 19920614 if a1 == 10955
replace sdate = 19920611 if a1 == 10956
replace sdate = 19920614 if a1 == 10957
replace sdate = 19920611 if a1 == 10958
replace sdate = 19920611 if a1 == 10959
replace sdate = 19920611 if a1 == 10925
replace sdate = 19920608 if a1 == 11102
replace sdate = 19920610 if a1 == 11103
replace sdate = 19920608 if a1 == 11104
replace sdate = 19920609 if a1 == 11105
replace sdate = 19920609 if a1 == 11106
replace sdate = 19920609 if a1 == 11107
replace sdate = 19920609 if a1 == 11108
replace sdate = 19920610 if a1 == 11109
replace sdate = 19920609 if a1 == 11110
replace sdate = 19920609 if a1 == 11111
replace sdate = 19920610 if a1 == 11112
replace sdate = 19920610 if a1 == 11113
replace sdate = 19920610 if a1 == 11114
replace sdate = . if a1 == 11115
replace sdate = 19920610 if a1 == 11116
replace sdate = 19920615 if a1 == 10741
replace sdate = 19920614 if a1 == 10742
replace sdate = 19920614 if a1 == 10743
replace sdate = 19920610 if a1 == 10744
replace sdate = 19920608 if a1 == 10745
replace sdate = . if a1 == 10746
replace sdate = 19920610 if a1 == 10747
replace sdate = 19920610 if a1 == 10748
replace sdate = 19920610 if a1 == 10749
replace sdate = 19920610 if a1 == 10750
replace sdate = 19920610 if a1 == 10751
replace sdate = 19920610 if a1 == 10752
replace sdate = 19920610 if a1 == 10753
replace sdate = 19920611 if a1 == 10754
replace sdate = . if a1 == 10151
replace sdate = . if a1 == 10152
replace sdate = 19920618 if a1 == 10153
replace sdate = 19920618 if a1 == 10154
replace sdate = 19920609 if a1 == 10155
replace sdate = 19920618 if a1 == 10156
replace sdate = 19920618 if a1 == 10157
replace sdate = 19920617 if a1 == 10158
replace sdate = 19920615 if a1 == 10159
replace sdate = 19920615 if a1 == 10160
replace sdate = 19920615 if a1 == 10161
replace sdate = 19920609 if a1 == 10162
replace sdate = 19920617 if a1 == 10163
replace sdate = 19920617 if a1 == 10164
replace sdate = 19920618 if a1 == 10165
replace sdate = 19920617 if a1 == 10166
replace sdate = . if a1 == 10167
replace sdate = 19920616 if a1 == 10168
replace sdate = 19920616 if a1 == 10169
replace sdate = 19920616 if a1 == 10170
replace sdate = 19920616 if a1 == 10171
replace sdate = 19920616 if a1 == 10172
replace sdate = 19920618 if a1 == 10173
replace sdate = 19920611 if a1 == 10174
replace sdate = 19920611 if a1 == 10175
replace sdate = 19920611 if a1 == 10176
replace sdate = 19920611 if a1 == 10177
replace sdate = 19920610 if a1 == 10178
replace sdate = 19920610 if a1 == 10179
replace sdate = 19920618 if a1 == 10180
replace sdate = 19920618 if a1 == 10181
replace sdate = 19920610 if a1 == 10182
replace sdate = 19920609 if a1 == 10183
replace sdate = 19920609 if a1 == 10184
replace sdate = 19920610 if a1 == 10185
replace sdate = 19920610 if a1 == 10186
replace sdate = 19920610 if a1 == 10187
replace sdate = 19920610 if a1 == 10188
replace sdate = 19920610 if a1 == 10189
replace sdate = 19920610 if a1 == 10190
replace sdate = 19920610 if a1 == 10191
replace sdate = 19920610 if a1 == 10192
replace sdate = 19920611 if a1 == 10193
replace sdate = 19920611 if a1 == 10194
replace sdate = 19920610 if a1 == 10195
replace sdate = 19920610 if a1 == 10196
replace sdate = 19920610 if a1 == 10197
replace sdate = 19920610 if a1 == 10198
replace sdate = 19920611 if a1 == 10199
replace sdate = 19920611 if a1 == 10200
replace sdate = 19920611 if a1 == 10201
replace sdate = 19920611 if a1 == 10202
replace sdate = 19920611 if a1 == 10203
replace sdate = 19920611 if a1 == 10204
replace sdate = 19920611 if a1 == 10205
replace sdate = 19920611 if a1 == 10206
replace sdate = 19920611 if a1 == 10207
replace sdate = 19920611 if a1 == 10208
replace sdate = 19920611 if a1 == 10209
replace sdate = 19920615 if a1 == 10210
replace sdate = 19920615 if a1 == 10211
replace sdate = 19920615 if a1 == 10212
replace sdate = 19920616 if a1 == 10213
replace sdate = 19920616 if a1 == 10214
replace sdate = 19920610 if a1 == 10215
replace sdate = 19920611 if a1 == 10216
replace sdate = 19920615 if a1 == 10217
replace sdate = 19920615 if a1 == 10218
replace sdate = 19920615 if a1 == 10219
replace sdate = 19920616 if a1 == 10220
replace sdate = 19920610 if a1 == 10221
replace sdate = 19920610 if a1 == 10222
replace sdate = 19920611 if a1 == 10223
replace sdate = 19920617 if a1 == 10224
replace sdate = 19920617 if a1 == 10225
replace sdate = 19920617 if a1 == 10226
replace sdate = 19920617 if a1 == 10227
replace sdate = 19920615 if a1 == 10228
replace sdate = 19920615 if a1 == 10229
replace sdate = 19920615 if a1 == 10230
replace sdate = 19920615 if a1 == 10231
replace sdate = 19920616 if a1 == 10232
replace sdate = 19920616 if a1 == 10233
replace sdate = 19920618 if a1 == 10234
replace sdate = 19920616 if a1 == 10235
replace sdate = 19920616 if a1 == 10236
replace sdate = 19920616 if a1 == 10237
replace sdate = 19920616 if a1 == 10238
replace sdate = 19920616 if a1 == 10239
replace sdate = 19920616 if a1 == 10240
replace sdate = 19920616 if a1 == 10241
replace sdate = 19920616 if a1 == 10242
replace sdate = 19920615 if a1 == 10243
replace sdate = 19920615 if a1 == 10244
replace sdate = 19920615 if a1 == 10245
replace sdate = 19920617 if a1 == 10246
replace sdate = 19920617 if a1 == 10247
replace sdate = 19920616 if a1 == 10248
replace sdate = 19920616 if a1 == 10249
replace sdate = 19920616 if a1 == 10250
replace sdate = 19920616 if a1 == 10101
replace sdate = . if a1 == 10102
replace sdate = 19920616 if a1 == 10103
replace sdate = 19920618 if a1 == 10104
replace sdate = 19920617 if a1 == 10105
replace sdate = . if a1 == 10106
replace sdate = 19920619 if a1 == 10107
replace sdate = . if a1 == 10108
replace sdate = 19920621 if a1 == 10109
replace sdate = . if a1 == 10110
replace sdate = 19920615 if a1 == 10111
replace sdate = 19920615 if a1 == 10112
replace sdate = 19920615 if a1 == 10113
replace sdate = . if a1 == 10114
replace sdate = 19920611 if a1 == 10115
replace sdate = 19920611 if a1 == 10116
replace sdate = . if a1 == 10117
replace sdate = . if a1 == 10118
replace sdate = . if a1 == 10119
replace sdate = 19920615 if a1 == 10120
replace sdate = . if a1 == 10121
replace sdate = 19920617 if a1 == 10122
replace sdate = 19920615 if a1 == 10123
replace sdate = . if a1 == 10124
replace sdate = . if a1 == 10125
replace sdate = 19920618 if a1 == 10126
replace sdate = 19920618 if a1 == 10127
replace sdate = . if a1 == 10128
replace sdate = 19920618 if a1 == 10129
replace sdate = 19920617 if a1 == 10130
replace sdate = . if a1 == 10131
replace sdate = 19920618 if a1 == 10132
replace sdate = . if a1 == 10133
replace sdate = . if a1 == 10134
replace sdate = . if a1 == 10135
replace sdate = . if a1 == 10136
replace sdate = . if a1 == 10137
replace sdate = . if a1 == 10138
replace sdate = . if a1 == 10139
replace sdate = . if a1 == 10140
replace sdate = 19920618 if a1 == 10141
replace sdate = 19920618 if a1 == 10142
replace sdate = 19920618 if a1 == 10143
replace sdate = 19920616 if a1 == 10144
replace sdate = 19920615 if a1 == 10145
replace sdate = 19920615 if a1 == 10146
replace sdate = 19920615 if a1 == 10147
replace sdate = 19920615 if a1 == 10148
replace sdate = 19920615 if a1 == 10149
replace sdate = 19920622 if a1 == 10150
replace sdate = 19920614 if a1 == 10625
replace sdate = 19920614 if a1 == 10626
replace sdate = 19920614 if a1 == 10627
replace sdate = 19920617 if a1 == 10628
replace sdate = 19920617 if a1 == 10629
replace sdate = 19920611 if a1 == 10630
replace sdate = 19920609 if a1 == 10631
replace sdate = 19920611 if a1 == 10632
replace sdate = 19920609 if a1 == 10633
replace sdate = 19920611 if a1 == 10634
replace sdate = 19920611 if a1 == 10635
replace sdate = 19920615 if a1 == 10636
replace sdate = 19920615 if a1 == 10637
replace sdate = 19920615 if a1 == 10638
replace sdate = 19920615 if a1 == 10639
replace sdate = 19920615 if a1 == 10640
replace sdate = 19920615 if a1 == 10641
replace sdate = 19920616 if a1 == 10642
replace sdate = 19920616 if a1 == 10643
replace sdate = 19920616 if a1 == 10644
replace sdate = 19920616 if a1 == 10645
replace sdate = 19920615 if a1 == 10688
replace sdate = 19920614 if a1 == 10689
replace sdate = 19920614 if a1 == 10690
replace sdate = 19920616 if a1 == 10691
replace sdate = 19920615 if a1 == 10692
replace sdate = 19920614 if a1 == 10693
replace sdate = 19920616 if a1 == 10694
replace sdate = 19920615 if a1 == 10695
replace sdate = 19920615 if a1 == 10696
replace sdate = 19920615 if a1 == 10697
replace sdate = 19920610 if a1 == 10532
replace sdate = 19920610 if a1 == 10531
replace sdate = 19920614 if a1 == 10555
replace sdate = 19920611 if a1 == 10554
replace sdate = 19920611 if a1 == 10553
replace sdate = 19920614 if a1 == 10552
replace sdate = 19920617 if a1 == 10551
replace sdate = 19920614 if a1 == 10550
replace sdate = 19920611 if a1 == 10549
replace sdate = 19920614 if a1 == 10548
replace sdate = 19920615 if a1 == 10547
replace sdate = 19920616 if a1 == 10546
replace sdate = 19920616 if a1 == 10545
replace sdate = 19920612 if a1 == 10544
replace sdate = 19920612 if a1 == 10543
replace sdate = 19920612 if a1 == 10542
replace sdate = 19920614 if a1 == 10541
replace sdate = 19920614 if a1 == 10540
replace sdate = 19920612 if a1 == 10539
replace sdate = 19920612 if a1 == 10538
replace sdate = 19920612 if a1 == 10537
replace sdate = 19920612 if a1 == 10536
replace sdate = 19920610 if a1 == 10535
replace sdate = 19920610 if a1 == 10534
replace sdate = 19920610 if a1 == 10533
replace sdate = 19920615 if a1 == 10687
replace sdate = 19920616 if a1 == 10686
replace sdate = 19920616 if a1 == 10685
replace sdate = 19920608 if a1 == 10684
replace sdate = 19920610 if a1 == 10683
replace sdate = 19920612 if a1 == 10682
replace sdate = 19920611 if a1 == 10681
replace sdate = 19920611 if a1 == 10680
replace sdate = 19920611 if a1 == 10679
replace sdate = 19920611 if a1 == 10678
replace sdate = 19920609 if a1 == 10677
replace sdate = 19920609 if a1 == 10676
replace sdate = 19920609 if a1 == 10675
replace sdate = 19920608 if a1 == 10674
replace sdate = 19920608 if a1 == 10673
replace sdate = 19920609 if a1 == 10672
replace sdate = 19920608 if a1 == 10671
replace sdate = 19920609 if a1 == 10670
replace sdate = 19920608 if a1 == 10669
replace sdate = 19920608 if a1 == 10668
replace sdate = 19920609 if a1 == 10667
replace sdate = 19920614 if a1 == 10666
replace sdate = 19920612 if a1 == 10665
replace sdate = 19920612 if a1 == 10664
replace sdate = 19920612 if a1 == 10663
replace sdate = 19920610 if a1 == 10662
replace sdate = 19920615 if a1 == 10661
replace sdate = 19920611 if a1 == 10660
replace sdate = 19920612 if a1 == 10659
replace sdate = 19920610 if a1 == 10658
replace sdate = 19920610 if a1 == 10657
replace sdate = 19920610 if a1 == 10656
replace sdate = 19920610 if a1 == 10655
replace sdate = 19920614 if a1 == 10654
replace sdate = 19920614 if a1 == 10653
replace sdate = 19920609 if a1 == 10652
replace sdate = 19920617 if a1 == 10651
replace sdate = 19920617 if a1 == 10650
replace sdate = 19920617 if a1 == 10649
replace sdate = 19920617 if a1 == 10648
replace sdate = 19920617 if a1 == 10647
replace sdate = 19920616 if a1 == 10646
replace sdate = 19920608 if a1 == 10586
replace sdate = 19920611 if a1 == 10585
replace sdate = 19920617 if a1 == 10584
replace sdate = 19920616 if a1 == 10583
replace sdate = 19920614 if a1 == 10582
replace sdate = 19920617 if a1 == 10581
replace sdate = 19920614 if a1 == 10580
replace sdate = 19920614 if a1 == 10579
replace sdate = 19920615 if a1 == 10578
replace sdate = 19920614 if a1 == 10577
replace sdate = 19920614 if a1 == 10576
replace sdate = 19920614 if a1 == 10575
replace sdate = 19920615 if a1 == 10574
replace sdate = 19920615 if a1 == 10573
replace sdate = 19920614 if a1 == 10572
replace sdate = 19920611 if a1 == 10571
replace sdate = 19920611 if a1 == 10570
replace sdate = 19920610 if a1 == 10569
replace sdate = 19920610 if a1 == 10568
replace sdate = 19920614 if a1 == 10567
replace sdate = 19920616 if a1 == 10566
replace sdate = 19920614 if a1 == 10565
replace sdate = 19920611 if a1 == 10564
replace sdate = 19920611 if a1 == 10563
replace sdate = 19920616 if a1 == 10562
replace sdate = 19920614 if a1 == 10561
replace sdate = 19920614 if a1 == 10560
replace sdate = 19920616 if a1 == 10559
replace sdate = 19920614 if a1 == 10558
replace sdate = 19920614 if a1 == 10557
replace sdate = 19920611 if a1 == 10556
replace sdate = 19920614 if a1 == 10624
replace sdate = 19920611 if a1 == 10740
replace sdate = 19920611 if a1 == 10739
replace sdate = 19920611 if a1 == 10738
replace sdate = 19920611 if a1 == 10737
replace sdate = 19920611 if a1 == 10736
replace sdate = 19920611 if a1 == 10735
replace sdate = 19920611 if a1 == 10734
replace sdate = 19920611 if a1 == 10733
replace sdate = 19920611 if a1 == 10732
replace sdate = 19920611 if a1 == 10731
replace sdate = 19920611 if a1 == 10730
replace sdate = 19920611 if a1 == 10729
replace sdate = 19920611 if a1 == 10728
replace sdate = 19920611 if a1 == 10727
replace sdate = 19920611 if a1 == 10726
replace sdate = 19920611 if a1 == 10725
replace sdate = 19920611 if a1 == 10724
replace sdate = 19920610 if a1 == 10723
replace sdate = 19920608 if a1 == 10722
replace sdate = 19920609 if a1 == 10721
replace sdate = 19920616 if a1 == 10720
replace sdate = 19920616 if a1 == 10719
replace sdate = 19920617 if a1 == 10718
replace sdate = 19920617 if a1 == 10717
replace sdate = 19920617 if a1 == 10716
replace sdate = 19920617 if a1 == 10715
replace sdate = 19920617 if a1 == 10714
replace sdate = 19920617 if a1 == 10713
replace sdate = 19920614 if a1 == 10712
replace sdate = 19920614 if a1 == 10711
replace sdate = 19920614 if a1 == 10710
replace sdate = 19920614 if a1 == 10709
replace sdate = 19920614 if a1 == 10708
replace sdate = 19920614 if a1 == 10707
replace sdate = 19920614 if a1 == 10706
replace sdate = 19920616 if a1 == 10705
replace sdate = 19920614 if a1 == 10704
replace sdate = 19920615 if a1 == 10703
replace sdate = 19920611 if a1 == 10702
replace sdate = 19920615 if a1 == 10701
replace sdate = 19920616 if a1 == 10700
replace sdate = 19920616 if a1 == 10699
replace sdate = 19920615 if a1 == 10698
replace sdate = 19920617 if a1 == 10283
replace sdate = 19920617 if a1 == 10282
replace sdate = 19920617 if a1 == 10281
replace sdate = 19920617 if a1 == 10280
replace sdate = 19920617 if a1 == 10277
replace sdate = 19920617 if a1 == 10276
replace sdate = 19920617 if a1 == 10275
replace sdate = 19920617 if a1 == 10274
replace sdate = 19920617 if a1 == 10273
replace sdate = 19920617 if a1 == 10272
replace sdate = 19920616 if a1 == 10270
replace sdate = 19920618 if a1 == 10271
replace sdate = 19920616 if a1 == 10269
replace sdate = 19920616 if a1 == 10268
replace sdate = 19920616 if a1 == 10267
replace sdate = 19920616 if a1 == 10266
replace sdate = 19920616 if a1 == 10265
replace sdate = 19920616 if a1 == 10264
replace sdate = 19920616 if a1 == 10262
replace sdate = 19920616 if a1 == 10263
replace sdate = 19920616 if a1 == 10260
replace sdate = 19920616 if a1 == 10261
replace sdate = 19920616 if a1 == 10259
replace sdate = 19920615 if a1 == 10258
replace sdate = 19920618 if a1 == 10257
replace sdate = 19920618 if a1 == 10256
replace sdate = 19920615 if a1 == 10254
replace sdate = 19920614 if a1 == 10255
replace sdate = 19920615 if a1 == 10253
replace sdate = 19920615 if a1 == 10252
replace sdate = 19920618 if a1 == 10251
replace sdate = 19920614 if a1 == 10294
replace sdate = 19920615 if a1 == 10293
replace sdate = 19920614 if a1 == 10292
replace sdate = 19920614 if a1 == 10290
replace sdate = 19920614 if a1 == 10291
replace sdate = 19920614 if a1 == 10289
replace sdate = 19920614 if a1 == 10288
replace sdate = 19920614 if a1 == 10286
replace sdate = 19920614 if a1 == 10287
replace sdate = 19920614 if a1 == 10284
replace sdate = 19920617 if a1 == 10285
replace sdate = 19920618 if a1 == 10323
replace sdate = 19920615 if a1 == 10321
replace sdate = 19920615 if a1 == 10322
replace sdate = 19920615 if a1 == 10320
replace sdate = 19920615 if a1 == 10318
replace sdate = 19920615 if a1 == 10319
replace sdate = 19920617 if a1 == 10317
replace sdate = 19920617 if a1 == 10316
replace sdate = 19920617 if a1 == 10315
replace sdate = 19920617 if a1 == 10314
replace sdate = 19920618 if a1 == 10313
replace sdate = 19920618 if a1 == 10311
replace sdate = 19920618 if a1 == 10312
replace sdate = 19920617 if a1 == 10308
replace sdate = 19920618 if a1 == 10309
replace sdate = 19920618 if a1 == 10310
replace sdate = 19920615 if a1 == 10306
replace sdate = 19920617 if a1 == 10307
replace sdate = 19920615 if a1 == 10303
replace sdate = 19920615 if a1 == 10304
replace sdate = 19920615 if a1 == 10305
replace sdate = 19920613 if a1 == 10301
replace sdate = 19920616 if a1 == 10302
replace sdate = 19920615 if a1 == 10299
replace sdate = 19920616 if a1 == 10300
replace sdate = 19920615 if a1 == 10297
replace sdate = 19920615 if a1 == 10298
replace sdate = 19920614 if a1 == 10295
replace sdate = 19920615 if a1 == 10296
replace sdate = 19920611 if a1 == 10333
replace sdate = 19920609 if a1 == 10332
replace sdate = 19920611 if a1 == 10331
replace sdate = 19920610 if a1 == 10330
replace sdate = 19920610 if a1 == 10329
replace sdate = 19920611 if a1 == 10328
replace sdate = 19920610 if a1 == 10327
replace sdate = 19920611 if a1 == 10324
replace sdate = 19920610 if a1 == 10325
replace sdate = 19920610 if a1 == 10326
replace sdate = 19920616 if a1 == 10360
replace sdate = 19920611 if a1 == 10358
replace sdate = 19920611 if a1 == 10359
replace sdate = 19920614 if a1 == 10356
replace sdate = 19920614 if a1 == 10357
replace sdate = 19920616 if a1 == 10354
replace sdate = 19920616 if a1 == 10355
replace sdate = 19920617 if a1 == 10352
replace sdate = 19920610 if a1 == 10353
replace sdate = 19920610 if a1 == 10350
replace sdate = 19920616 if a1 == 10351
replace sdate = 19920610 if a1 == 10348
replace sdate = 19920610 if a1 == 10349
replace sdate = 19920614 if a1 == 10346
replace sdate = 19920610 if a1 == 10347
replace sdate = 19920617 if a1 == 10343
replace sdate = 19920610 if a1 == 10344
replace sdate = 19920616 if a1 == 10345
replace sdate = 19920617 if a1 == 10342
replace sdate = 19920610 if a1 == 10339
replace sdate = 19920610 if a1 == 10340
replace sdate = 19920609 if a1 == 10341
replace sdate = 19920609 if a1 == 10336
replace sdate = 19920611 if a1 == 10337
replace sdate = 19920610 if a1 == 10338
replace sdate = 19920611 if a1 == 10334
replace sdate = 19920611 if a1 == 10335
replace sdate = 19920616 if a1 == 10377
replace sdate = 19920616 if a1 == 10378
replace sdate = 19920616 if a1 == 10379
replace sdate = 19920614 if a1 == 10380
replace sdate = 19920614 if a1 == 10381
replace sdate = 19920615 if a1 == 10374
replace sdate = 19920611 if a1 == 10373
replace sdate = 19920615 if a1 == 10375
replace sdate = 19920615 if a1 == 10376
replace sdate = 19920612 if a1 == 10371
replace sdate = 19920612 if a1 == 10372
replace sdate = 19920612 if a1 == 10368
replace sdate = 19920611 if a1 == 10369
replace sdate = 19920614 if a1 == 10370
replace sdate = 19920614 if a1 == 10366
replace sdate = 19920614 if a1 == 10367
replace sdate = 19920616 if a1 == 10361
replace sdate = 19920616 if a1 == 10362
replace sdate = 19920614 if a1 == 10363
replace sdate = 19920611 if a1 == 10364
replace sdate = 19920611 if a1 == 10365
replace sdate = 19920614 if a1 == 10392
replace sdate = 19920614 if a1 == 10393
replace sdate = 19920614 if a1 == 10394
replace sdate = 19920614 if a1 == 10395
replace sdate = 19920612 if a1 == 10396
replace sdate = 19920614 if a1 == 10397
replace sdate = 19920611 if a1 == 10398
replace sdate = 19920617 if a1 == 10391
replace sdate = 19920617 if a1 == 10389
replace sdate = 19920617 if a1 == 10390
replace sdate = 19920616 if a1 == 10382
replace sdate = 19920616 if a1 == 10383
replace sdate = 19920616 if a1 == 10384
replace sdate = 19920616 if a1 == 10385
replace sdate = 19920616 if a1 == 10386
replace sdate = 19920617 if a1 == 10387
replace sdate = 19920617 if a1 == 10388
replace sdate = 19920608 if a1 == 10417
replace sdate = 19920609 if a1 == 10415
replace sdate = 19920611 if a1 == 10416
replace sdate = 19920609 if a1 == 10414
replace sdate = 19920609 if a1 == 10413
replace sdate = 19920617 if a1 == 10410
replace sdate = 19920609 if a1 == 10411
replace sdate = 19920608 if a1 == 10412
replace sdate = 19920611 if a1 == 10407
replace sdate = 19920611 if a1 == 10408
replace sdate = 19920617 if a1 == 10409
replace sdate = 19920611 if a1 == 10406
replace sdate = 19920611 if a1 == 10405
replace sdate = 19920611 if a1 == 10404
replace sdate = 19920611 if a1 == 10403
replace sdate = 19920611 if a1 == 10402
replace sdate = 19920611 if a1 == 10400
replace sdate = 19920611 if a1 == 10401
replace sdate = 19920611 if a1 == 10399
replace sdate = 19920617 if a1 == 10468
replace sdate = 19920617 if a1 == 10469
replace sdate = 19920617 if a1 == 10465
replace sdate = 19920617 if a1 == 10466
replace sdate = 19920616 if a1 == 10467
replace sdate = 19920617 if a1 == 10463
replace sdate = 19920617 if a1 == 10464
replace sdate = 19920615 if a1 == 10460
replace sdate = 19920618 if a1 == 10461
replace sdate = 19920618 if a1 == 10462
replace sdate = 19920615 if a1 == 10459
replace sdate = 19920615 if a1 == 10458
replace sdate = 19920615 if a1 == 10457
replace sdate = 19920616 if a1 == 10456
replace sdate = 19920612 if a1 == 10455
replace sdate = 19920612 if a1 == 10454
replace sdate = 19920615 if a1 == 10453
replace sdate = 19920615 if a1 == 10452
replace sdate = 19920616 if a1 == 10451
replace sdate = 19920616 if a1 == 10450
replace sdate = 19920616 if a1 == 10449
replace sdate = 19920612 if a1 == 10448
replace sdate = 19920614 if a1 == 10447
replace sdate = 19920617 if a1 == 10446
replace sdate = 19920616 if a1 == 10445
replace sdate = 19920611 if a1 == 10444
replace sdate = 19920611 if a1 == 10443
replace sdate = 19920617 if a1 == 10442
replace sdate = 19920615 if a1 == 10441
replace sdate = 19920615 if a1 == 10440
replace sdate = . if a1 == 11117
replace sdate = 19920617 if a1 == 11118
replace sdate = 19920617 if a1 == 11119
replace sdate = 19920617 if a1 == 11120
replace sdate = 19920617 if a1 == 11121
replace sdate = 19920617 if a1 == 11122
replace sdate = 19920617 if a1 == 11123
replace sdate = 19920617 if a1 == 11124
replace sdate = 19920617 if a1 == 11125
replace sdate = 19920609 if a1 == 11126
replace sdate = 19920609 if a1 == 11124
replace sdate = 19920609 if a1 == 11128
replace sdate = 19920609 if a1 == 11129
replace sdate = 19920609 if a1 == 11130
replace sdate = 19920609 if a1 == 11131
replace sdate = 19920609 if a1 == 11132
replace sdate = 19920609 if a1 == 11133
replace sdate = 19920609 if a1 == 11134
replace sdate = 19920609 if a1 == 11135
replace sdate = 19920609 if a1 == 11136
replace sdate = 19920609 if a1 == 11137
replace sdate = 19920609 if a1 == 11138
replace sdate = 19920609 if a1 == 11139
replace sdate = . if a1 == 11140
replace sdate = . if a1 == 11141
replace sdate = . if a1 == 11142
replace sdate = . if a1 == 11143
replace sdate = . if a1 == 11144
replace sdate = . if a1 == 11145
replace sdate = . if a1 == 11146
replace sdate = . if a1 == 11147
replace sdate = 19920611 if a1 == 11148
replace sdate = 19920614 if a1 == 11149
replace sdate = 19920614 if a1 == 11150
replace sdate = 19920614 if a1 == 11151
replace sdate = 19920614 if a1 == 11152
replace sdate = 19920614 if a1 == 11153
replace sdate = 19920614 if a1 == 11154
replace sdate = 19920614 if a1 == 11155
replace sdate = 19920615 if a1 == 11156
replace sdate = 19920614 if a1 == 11157
replace sdate = 19920614 if a1 == 11158
replace sdate = 19920611 if a1 == 11159
replace sdate = 19920614 if a1 == 11160
replace sdate = 19920611 if a1 == 11161
replace sdate = 19920611 if a1 == 11162
replace sdate = 19920611 if a1 == 11163
replace sdate = 19920614 if a1 == 11164
replace sdate = 19920611 if a1 == 11165
replace sdate = 19920611 if a1 == 11166
replace sdate = 19920611 if a1 == 11167
replace sdate = . if a1 == 11168
replace sdate = . if a1 == 11169
replace sdate = . if a1 == 11170
replace sdate = . if a1 == 11171
replace sdate = . if a1 == 11172
replace sdate = . if a1 == 11173
replace sdate = . if a1 == 11174
replace sdate = . if a1 == 11175
replace sdate = . if a1 == 11176
replace sdate = . if a1 == 11177
replace sdate = . if a1 == 11178
replace sdate = . if a1 == 11179
replace sdate = . if a1 == 11180
replace sdate = . if a1 == 11181
replace sdate = . if a1 == 11182
replace sdate = . if a1 == 11183
replace sdate = . if a1 == 11184
replace sdate = . if a1 == 11185
replace sdate = . if a1 == 11186
replace sdate = . if a1 == 11187
replace sdate = . if a1 == 11188
replace sdate = . if a1 == 11189
replace sdate = . if a1 == 11190
replace sdate = . if a1 == 11191
replace sdate = . if a1 == 11192
replace sdate = 19920611 if a1 == 10960
replace sdate = 19920611 if a1 == 10961
replace sdate = 19920614 if a1 == 10962
replace sdate = 19920613 if a1 == 10963
replace sdate = 19920609 if a1 == 10964
replace sdate = 19920611 if a1 == 10965
replace sdate = 19920611 if a1 == 10966
replace sdate = 19920609 if a1 == 10967
replace sdate = 19920609 if a1 == 10968
replace sdate = 19920609 if a1 == 10969
replace sdate = 19920609 if a1 == 10970
replace sdate = 19920609 if a1 == 10971
replace sdate = 19920610 if a1 == 10972
replace sdate = 19920610 if a1 == 10973
replace sdate = 19920610 if a1 == 10974
replace sdate = 19920610 if a1 == 10975
replace sdate = 19920610 if a1 == 10976
replace sdate = 19920610 if a1 == 10977
replace sdate = 19920610 if a1 == 10978
replace sdate = 19920611 if a1 == 10979
replace sdate = 19920611 if a1 == 10980
replace sdate = 19920611 if a1 == 10981
replace sdate = 19920611 if a1 == 10982
replace sdate = 19920611 if a1 == 10983
replace sdate = 19920611 if a1 == 10984
replace sdate = 19920616 if a1 == 10985
replace sdate = 19920616 if a1 == 10986
replace sdate = 19920616 if a1 == 10987
replace sdate = 19920616 if a1 == 10988
replace sdate = 19920611 if a1 == 10989
replace sdate = 19920615 if a1 == 10990
replace sdate = 19920615 if a1 == 10991
replace sdate = 19920615 if a1 == 10992
replace sdate = 19920615 if a1 == 10993
replace sdate = 19920615 if a1 == 10994
replace sdate = 19920615 if a1 == 10995
replace sdate = 19920615 if a1 == 10996
replace sdate = 19920615 if a1 == 10997
replace sdate = 19920615 if a1 == 10998
replace sdate = 19920615 if a1 == 10999
replace sdate = 19920615 if a1 == 11000
replace sdate = 19920615 if a1 == 11001
replace sdate = 19920615 if a1 == 11002
replace sdate = 19920615 if a1 == 11003
replace sdate = 19920615 if a1 == 11004
replace sdate = 19920615 if a1 == 11005
replace sdate = 19920615 if a1 == 11006
replace sdate = 19920615 if a1 == 11007
replace sdate = 19920615 if a1 == 11008
replace sdate = 19920615 if a1 == 11009
replace sdate = 19920615 if a1 == 11010
replace sdate = 19920615 if a1 == 11011
replace sdate = 19920615 if a1 == 11012
replace sdate = 19920615 if a1 == 11013
replace sdate = 19920616 if a1 == 11014
replace sdate = 19920615 if a1 == 11015
replace sdate = 19920615 if a1 == 11016
replace sdate = 19920615 if a1 == 11017
replace sdate = 19920615 if a1 == 11018
replace sdate = 19920615 if a1 == 11019
replace sdate = 19920616 if a1 == 11020
replace sdate = 19920610 if a1 == 11021
replace sdate = 19920610 if a1 == 11022
replace sdate = 19920610 if a1 == 11023
replace sdate = 19920610 if a1 == 11024
replace sdate = 19920610 if a1 == 11025
replace sdate = 19920610 if a1 == 11026
replace sdate = 19920610 if a1 == 11027
replace sdate = 19920610 if a1 == 11028
replace sdate = 19920610 if a1 == 11029
replace sdate = 19920610 if a1 == 11030
replace sdate = 19920610 if a1 == 11031
replace sdate = 19920609 if a1 == 11032
replace sdate = 19920609 if a1 == 11033
replace sdate = 19920609 if a1 == 11034
replace sdate = 19920609 if a1 == 11035
replace sdate = 19920610 if a1 == 11036
replace sdate = 19920610 if a1 == 11037
replace sdate = 19920609 if a1 == 11038
replace sdate = 19920609 if a1 == 11039
replace sdate = 19920610 if a1 == 11040
replace sdate = 19920614 if a1 == 11041
replace sdate = 19920614 if a1 == 11042
replace sdate = 19920614 if a1 == 11043
replace sdate = 19920614 if a1 == 11044
replace sdate = 19920614 if a1 == 11045
replace sdate = 19920614 if a1 == 11046
replace sdate = 19920615 if a1 == 10909
replace sdate = 19920615 if a1 == 10910
replace sdate = 19920615 if a1 == 10911
replace sdate = 19920610 if a1 == 10912
replace sdate = 19920615 if a1 == 10913
replace sdate = 19920616 if a1 == 10914
replace sdate = 19920616 if a1 == 10915
replace sdate = 19920616 if a1 == 10916
replace sdate = 19920616 if a1 == 10917
replace sdate = 19920616 if a1 == 10918
replace sdate = 19920615 if a1 == 10919
replace sdate = 19920616 if a1 == 10920
replace sdate = 19920611 if a1 == 10921
replace sdate = 19920611 if a1 == 10922
replace sdate = 19920611 if a1 == 10923
replace sdate = 19920611 if a1 == 10924
replace sdate = 19920611 if a1 == 10926
replace sdate = 19920610 if a1 == 10927
replace sdate = 19920610 if a1 == 10928
replace sdate = 19920614 if a1 == 10782
replace sdate = 19920610 if a1 == 10783
replace sdate = 19920610 if a1 == 10784
replace sdate = 19920610 if a1 == 10785
replace sdate = 19920610 if a1 == 10786
replace sdate = 19920610 if a1 == 10787
replace sdate = 19920610 if a1 == 10788
replace sdate = 19920610 if a1 == 10789
replace sdate = 19920610 if a1 == 10790
replace sdate = 19920615 if a1 == 10791
replace sdate = 19920615 if a1 == 10792
replace sdate = 19920615 if a1 == 10793
replace sdate = 19920615 if a1 == 10794
replace sdate = 19920615 if a1 == 10795
replace sdate = 19920615 if a1 == 10796
replace sdate = 19920615 if a1 == 10797
replace sdate = 19920616 if a1 == 10798
replace sdate = 19920616 if a1 == 10799
replace sdate = 19920616 if a1 == 10800
replace sdate = 19920616 if a1 == 10801
replace sdate = 19920614 if a1 == 10802
replace sdate = 19920615 if a1 == 10803
replace sdate = 19920614 if a1 == 10804
replace sdate = 19920614 if a1 == 10805
replace sdate = 19920614 if a1 == 10806
replace sdate = 19920614 if a1 == 10807
replace sdate = 19920614 if a1 == 10808
replace sdate = 19920614 if a1 == 10809
replace sdate = 19920614 if a1 == 10810
replace sdate = 19920616 if a1 == 10811
replace sdate = 19920614 if a1 == 10812
replace sdate = 19920614 if a1 == 10813
replace sdate = 19920614 if a1 == 10814
replace sdate = 19920614 if a1 == 10815
replace sdate = 19920615 if a1 == 10816
replace sdate = 19920615 if a1 == 10817
replace sdate = 19920612 if a1 == 10818
replace sdate = 19920612 if a1 == 10819
replace sdate = 19920612 if a1 == 10820
replace sdate = 19920611 if a1 == 10821
replace sdate = 19920611 if a1 == 10822
replace sdate = 19920611 if a1 == 10823
replace sdate = 19920611 if a1 == 10824
replace sdate = 19920615 if a1 == 10825
replace sdate = 19920615 if a1 == 10826
replace sdate = 19920615 if a1 == 10827
replace sdate = 19920615 if a1 == 10828
replace sdate = 19920615 if a1 == 10829
replace sdate = 19920615 if a1 == 10830
replace sdate = 19920609 if a1 == 10831
replace sdate = 19920609 if a1 == 10832
replace sdate = 19920609 if a1 == 10833
replace sdate = 19920609 if a1 == 10834
replace sdate = 19920609 if a1 == 10835
replace sdate = 19920609 if a1 == 10836
replace sdate = 19920609 if a1 == 10837
replace sdate = 19920609 if a1 == 10838
replace sdate = 19920610 if a1 == 10839
replace sdate = 19920608 if a1 == 10840
replace sdate = 19920614 if a1 == 10841
replace sdate = 19920614 if a1 == 10842
replace sdate = 19920610 if a1 == 10843
replace sdate = 19920610 if a1 == 10844
replace sdate = 19920610 if a1 == 10845
replace sdate = 19920610 if a1 == 10846
replace sdate = 19920610 if a1 == 10847
replace sdate = 19920608 if a1 == 10848
replace sdate = 19920608 if a1 == 10849
replace sdate = 19920608 if a1 == 10850
replace sdate = 19920610 if a1 == 10851
replace sdate = 19920610 if a1 == 10852
replace sdate = 19920610 if a1 == 10853
replace sdate = 19920610 if a1 == 10854
replace sdate = 19920610 if a1 == 10855
replace sdate = 19920610 if a1 == 10856
replace sdate = 19920610 if a1 == 10857
replace sdate = 19920611 if a1 == 10858
replace sdate = 19920611 if a1 == 10859
replace sdate = 19920610 if a1 == 10860
replace sdate = 19920610 if a1 == 10861
replace sdate = 19920610 if a1 == 10862
replace sdate = 19920610 if a1 == 10863
replace sdate = 19920610 if a1 == 10864
replace sdate = 19920610 if a1 == 10865
replace sdate = 19920610 if a1 == 10866
replace sdate = 19920610 if a1 == 10867
replace sdate = 19920610 if a1 == 10868
replace sdate = 19920610 if a1 == 10869
replace sdate = 19920611 if a1 == 10870
replace sdate = 19920610 if a1 == 10756
replace sdate = 19920610 if a1 == 10757
replace sdate = 19920610 if a1 == 10758
replace sdate = 19920610 if a1 == 10759
replace sdate = 19920610 if a1 == 10760
replace sdate = 19920610 if a1 == 10761
replace sdate = 19920610 if a1 == 10762
replace sdate = 19920610 if a1 == 10763
replace sdate = 19920610 if a1 == 10764
replace sdate = 19920610 if a1 == 10765
replace sdate = 19920610 if a1 == 10766
replace sdate = 19920610 if a1 == 10767
replace sdate = 19920609 if a1 == 10768
replace sdate = 19920609 if a1 == 10769
replace sdate = 19920610 if a1 == 10770
replace sdate = 19920609 if a1 == 10771
replace sdate = 19920610 if a1 == 10772
replace sdate = 19920609 if a1 == 10773
replace sdate = 19920610 if a1 == 10774
replace sdate = 19920614 if a1 == 10775
replace sdate = 19920614 if a1 == 11301
replace sdate = 19920610 if a1 == 10776
replace sdate = 19920610 if a1 == 10777
replace sdate = 19920610 if a1 == 10778
replace sdate = 19920615 if a1 == 10779
replace sdate = 19920610 if a1 == 10780
replace sdate = 19920610 if a1 == 10755
replace sdate = 19920610 if a1 == 10781

gen surveydate = sdate

format %tdMon_DD,_CCYY surveydate

gen electiondate = 19920623

format %tdMon_DD,_CCYY electiondate

gen time = (electiondate - surveydate) - 1 // Substract 1 to correct for election date

* Gender

gen male = i67

recode male (1=0)
recode male (2=1)

* Age

gen age = i61

replace age = . if age < 17

* Education

gen education = i62

* Preferred party as leading party after the election

gen govpref = .

replace govpref = 9999 if i40 == .
replace govpref = 9999 if i40 == 0
replace govpref = 9999 if i40 == 7
replace govpref = 9999 if i40 == 8
replace govpref = 9999 if i40 == 9

replace govpref = 1 if i40 == 1 & govpref!=9999

replace govpref = 0 if i40!=1 & govpref!=1 & govpref!=9999

replace govpref = . if govpref == 9999

label define govpref 0 "Losing preference" 1 "Winning preference"
label values govpref govpref

* Press news attentiveness

gen press = i58

recode press (5=4)

recode press (.=-99)

* TV news attentiveness

gen tv = 5 - i48

recode tv (.=-99)

* News attentiveness index

egen news = rowmax(press tv)

recode news (-99=.)

* Political discussion

gen discussion = 4 - a60

gen discussion_3pts = discussion
replace discussion_3pts = 0 if discussion == 1
replace discussion_3pts = 1 if discussion == 2
replace discussion_3pts = 2 if discussion == 3


*********************************
** NATIONAL-LEVEL EXPECTATIONS **
*********************************

* Forecasts (1 = Labor, 2 = Likud, 3 = National unity government, 4 = National unity government headed by Labor, 5 = National unity government headed by Likud, 6 = other)

gen forecast_whole = i39

* Identify correct forecasts

gen correct_whole_d = 0 if forecast_whole!=1 & forecast_whole!=.
replace correct_whole_d = 1 if forecast_whole == 1 & forecast_whole!=.


**********
** SAVE **
**********

save "il1992_ines.dta", replace


*******************
** MAIN ANALYSES **
*******************

* Regression analysis and percentage of correct and incorrect forecasts

logistic correct_whole_d discussion i.govpref news age i.male education time
estimates table, star(.05 .01 .001)

tab correct_whole_d if e(sample) == 1


************************
** SUMMARY STATISTICS **
************************

label variable correct_whole_d "Leading party (DV)"
label variable discussion "Discussion"
label variable govpref "Govt preference"
label variable news "News attentiveness"
label variable age "Age"
label variable male "Gender (male = 1)"
label variable education "Education"
label variable time "Time of interview"

estpost tabstat correct_whole_d discussion govpref news age male education time if e(sample) == 1, statistics(n mean p50 sd min max) columns(statistics)

esttab using "il1992_ines_summary_national.tex", substitute("\begin{table}[htbp]" "\begin{table}[H]") cells("count(label(N) fmt(%9.0fc)) mean(fmt(%5.2f) label(Mean)) p50(fmt(%5.1f) label(Median)) sd(fmt(%5.1f) label(Std. dev.)) min(fmt(%5.1f) label(Min)) max(fmt(%5.1f) label(Max))") label width(\textwidth) nomtitle nonumber noobs booktabs title("Summary statistics -- 1992 Israeli legislative election (INES), national level") replace

eststo clear

log close